00100 LIN 0 0 9; 00200 P2 .13; 00300 P3 NO/A4/B/C5/D/ F/D/ BF/A/ E; 00400 P4 2000; 00500 P5 "P5";P6 "P6"; 00600 P7 "P7"; P8 "P8"; 00700 P9 NU/.52//// .13// .26// ; 00800 P10 LIT/Z(";PT=0"/" ")/// ";PT=0"// @Z/; 00900 RUN;